object GlobalPrefDlg: TGlobalPrefDlg Left = 227 Top = 124 HelpContext = 14222 ActiveControl = tvTree BorderIcons = [biSystemMenu] BorderStyle = bsDialog BorderWidth = 3 Caption = 'The Bat! - Preferences' ClientHeight = 445 ClientWidth = 653 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True OldCreateOrder = True Position = poScreenCenter OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnKeyDown = FormKeyDown OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object tvTree: TTreeView Left = 0 Top = 0 Width = 181 Height = 405 BevelInner = bvNone HideSelection = False Indent = 19 ReadOnly = True RightClickSelect = True RowSelect = True ShowButtons = False TabOrder = 0 OnChange = tvTreeChange Items.Data = { 09000000200000000000000000000000FFFFFFFFFFFFFFFF0000000000000000 0747656E6572616C1F0000000000000000000000FFFFFFFFFFFFFFFF00000000 000000000653797374656D250000000000000000000000FFFFFFFFFFFFFFFF00 000000000000000C4170706C69636174696F6E73210000000000000000000000 FFFFFFFFFFFFFFFF0000000005000000084D657373616765732F000000000000 0000000000FFFFFFFFFFFFFFFF000000000000000016436F6C6F75722047726F 75707320616E6420466F6E74230000000000000000000000FFFFFFFFFFFFFFFF 00000000000000000A56696577204D6F646573280000000000000000000000FF FFFFFFFFFFFFFF00000000000000000F4D657373616765206865616465727327 0000000000000000000000FFFFFFFFFFFFFFFF00000000000000000E48656164 657220446973706C6179240000000000000000000000FFFFFFFFFFFFFFFF0000 0000000000000B4D61696C205469636B6572230000000000000000000000FFFF FFFFFFFFFFFF00000000020000000A50726F74656374696F6E23000000000000 0000000000FFFFFFFFFFFFFFFF00000000000000000A416E74692D5669727573 220000000000000000000000FFFFFFFFFFFFFFFF000000000000000009416E74 692D5350414D260000000000000000000000FFFFFFFFFFFFFFFF000000000400 00000D5669657765722F456469746F722B0000000000000000000000FFFFFFFF FFFFFFFF000000000000000012456469746F7220707265666572656E6365732B 0000000000000000000000FFFFFFFFFFFFFFFF000000000000000012506C6169 6E20746578742F4D6963726F45642C0000000000000000000000FFFFFFFFFFFF FFFF00000000000000001348544D4C2F57696E646F777320456469746F722600 00000000000000000000FFFFFFFFFFFFFFFF00000000000000000D536F757263 65205669657765722E0000000000000000000000FFFFFFFFFFFFFFFF00000000 000000001543686172616374657220536574732028584C415429280000000000 000000000000FFFFFFFFFFFFFFFF00000000000000000F53797374656D20486F 74204B657973210000000000000000000000FFFFFFFFFFFFFFFF000000000000 000008506C75672D496E73} end object Book: TPageControl Left = 184 Top = 0 Width = 469 Height = 406 ActivePage = tsMailTicker TabOrder = 1 TabStop = False OnChange = BookChange object tsGeneral: TTabSheet HelpContext = 14222 Caption = 'General' object lConnCentre: TLabel Left = 16 Top = 295 Width = 269 Height = 13 AutoSize = False Caption = 'Display Connection Centre' FocusControl = cbConnCentre end object Label21: TLabel Left = 16 Top = 324 Width = 269 Height = 13 AutoSize = False Caption = 'Default Virtual Folder name template:' end object cbMiniTray: TCheckBox Left = 16 Top = 60 Width = 425 Height = 17 Caption = 'Minimise to the System Tray' TabOrder = 2 end object cbAlwaysInTray: TCheckBox Left = 16 Top = 16 Width = 417 Height = 17 Caption = 'Always show icon in the System Tray' TabOrder = 0 OnClick = cbAlwaysInTrayClick end object cbAnimation: TCheckBox Left = 16 Top = 84 Width = 425 Height = 17 Caption = 'Icon animation when unread messages are detected' TabOrder = 3 end object cbExtImgViewer: TCheckBox Left = 16 Top = 108 Width = 425 Height = 17 Caption = 'Use external viewer to open attached images' TabOrder = 4 end object cbHCImages: TCheckBox Left = 16 Top = 132 Width = 425 Height = 17 Caption = 'High colour images (change effective after restart)' TabOrder = 5 end object cbConnCentre: TComboBox Left = 292 Top = 291 Width = 161 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 11 Items.Strings = ( 'Automatically' 'Always' 'Hide') end object cbBirthCheck: TCheckBox Left = 16 Top = 156 Width = 425 Height = 17 Caption = 'Inform about birthdays using address book data' TabOrder = 6 end object cbShowTask: TCheckBox Left = 40 Top = 36 Width = 401 Height = 17 Caption = 'Do not display program icon on the Task Bar' TabOrder = 1 OnClick = cbShowTaskClick end object cbMenuNav: TCheckBox Left = 16 Top = 180 Width = 425 Height = 17 Caption = 'Display MenuNavigator button on the Caption Bar' TabOrder = 7 end object cbCloseViewOnReply: TCheckBox Left = 16 Top = 204 Width = 441 Height = 17 Caption = 'Close the separate viewer parent window when replying/forwarding' TabOrder = 8 end object cbXMailer: TCheckBox Left = 16 Top = 232 Width = 441 Height = 17 Caption = 'Use X-Mailer header in messages (for administrative purposes)' TabOrder = 9 end object cbRestoreSession: TCheckBox Left = 16 Top = 260 Width = 433 Height = 17 Caption = 'Start program after system halt' TabOrder = 10 end object edVFolderTempl: TEdit Left = 292 Top = 320 Width = 161 Height = 21 TabOrder = 12 end end object tbAdvanced: TTabSheet HelpContext = 14223 Caption = 'System' object lWDir: TLabel Left = 16 Top = 8 Width = 67 Height = 13 Caption = 'Mail Directory:' end object eWDir: TEdit Left = 16 Top = 24 Width = 321 Height = 21 TabOrder = 0 end object bBrowseWDir: TButton Left = 352 Top = 22 Width = 89 Height = 25 Caption = 'Browse...' TabOrder = 1 OnClick = bBrowseWDirClick end object cbFolderFont: TGroupBox Left = 16 Top = 304 Width = 425 Height = 73 Caption = 'Account tree font' TabOrder = 5 object eFolderFont: TEdit Left = 16 Top = 24 Width = 297 Height = 33 AutoSize = False BorderStyle = bsNone Color = clBtnFace ReadOnly = True TabOrder = 0 end object bFolderFont: TButton Left = 320 Top = 22 Width = 89 Height = 25 Caption = 'Change...' TabOrder = 1 OnClick = bFolderFontClick end end object gbAutocomplete: TGroupBox Left = 16 Top = 56 Width = 425 Height = 113 Caption = 'AutoComplete' TabOrder = 2 object lACSource: TLabel Left = 40 Top = 40 Width = 118 Height = 13 Caption = 'Complete addresses from' Enabled = False FocusControl = cbACSource end object cbAutocompleteAddress: TCheckBox Left = 16 Top = 20 Width = 369 Height = 17 Caption = 'Complete automatically address entry fields' TabOrder = 0 OnClick = cbAutocompleteAddressClick end object cbACSource: TComboBox Left = 40 Top = 56 Width = 345 Height = 21 Style = csDropDownList Enabled = False ItemHeight = 13 TabOrder = 1 Items.Strings = ( 'Input History' 'Default Address Book only' 'All Address Books' 'History+Default Address Book' 'History+All Address Books') end object cbAutocompleteSubject: TCheckBox Left = 16 Top = 84 Width = 393 Height = 17 Caption = 'Automatically complete subject from the history ' TabOrder = 2 end end object gbLogBeeps: TGroupBox Left = 16 Top = 176 Width = 425 Height = 41 Caption = 'When logging events, use system alarm sound for' TabOrder = 3 object cbBeepOnError: TCheckBox Left = 16 Top = 16 Width = 201 Height = 17 Caption = 'Errors' TabOrder = 0 end object cbBeepOnWarning: TCheckBox Left = 224 Top = 16 Width = 185 Height = 17 Caption = 'Warnings' TabOrder = 1 end end object gbXButtons: TGroupBox Left = 16 Top = 224 Width = 425 Height = 73 Caption = 'Extended mouse button functions' TabOrder = 4 object Label1: TLabel Left = 8 Top = 20 Width = 97 Height = 13 Caption = 'Button &1 ("Forward")' end object Label2: TLabel Left = 8 Top = 44 Width = 84 Height = 13 Caption = 'Button &2 ("Back")' end object cbXButton1: TComboBox Left = 184 Top = 16 Width = 233 Height = 21 Style = csDropDownList ItemHeight = 13 ItemIndex = 0 TabOrder = 0 Text = 'Go to the previous viewed message' Items.Strings = ( 'Go to the previous viewed message' 'Go to the next viewed message' 'Go backwards to an unread message' 'Go to the next unread message' 'Reply' 'Forward' 'Create a new message' 'Toggle flag' 'Delete') end object cbXButton2: TComboBox Left = 184 Top = 40 Width = 233 Height = 21 Style = csDropDownList ItemHeight = 13 ItemIndex = 3 TabOrder = 1 Text = 'Go to the next unread message' Items.Strings = ( 'Go to the previous viewed message' 'Go to the next viewed message' 'Go backwards to an unread message' 'Go to the next unread message' 'Reply' 'Forward' 'Create a new message' 'Toggle flag' 'Delete') end end end object tbApps: TTabSheet HelpContext = 14223 Caption = 'Applications' object lCheckDefaultAux: TLabel Left = 42 Top = 296 Width = 3 Height = 13 end object gbAssociations: TGroupBox Left = 16 Top = 8 Width = 425 Height = 153 Caption = 'Associate The Bat! with specific file types/URLs' TabOrder = 0 object cbMSG: TCheckBox Left = 16 Top = 48 Width = 370 Height = 17 Caption = '.MSG - e-mail message files in RFC-822 format' TabOrder = 1 end object cbEML: TCheckBox Left = 16 Top = 72 Width = 370 Height = 17 Caption = '.EML - e-mail message files in RFC-822 format' TabOrder = 2 end object cbVCF: TCheckBox Left = 16 Top = 96 Width = 370 Height = 17 Caption = '.VCF - electronic visitor card files (vCard)' TabOrder = 3 end object bAssociate: TButton Left = 232 Top = 120 Width = 147 Height = 25 Caption = 'Associate now' TabOrder = 4 OnClick = bAssociateClick end object cbMailto: TCheckBox Left = 16 Top = 24 Width = 370 Height = 17 Caption = 'mailto: - the URL for creating mail messages' TabOrder = 0 end end object GroupBox2: TGroupBox Left = 16 Top = 168 Width = 425 Height = 105 Caption = 'Simple MAPI' TabOrder = 1 object Label3: TLabel Left = 16 Top = 24 Width = 353 Height = 41 AutoSize = False Caption = 'Simple MAPI is a program interface used by many applications hel' + 'ping them to communicate with e-mail client in order to create/s' + 'end/access messages generated by those applications' WordWrap = True end object bInstallMAPI: TButton Left = 48 Top = 72 Width = 329 Height = 25 Caption = 'Install The Bat! as the Simple MAPI request handler' TabOrder = 0 OnClick = bInstallMAPIClick end end object cbCheckDefault: TCheckBox Left = 16 Top = 296 Width = 393 Height = 17 Caption = 'Check that The Bat! is the default mail client at startup' TabOrder = 2 end end object tsMsgList: TTabSheet HelpContext = 14224 Caption = 'Messages' object Label9: TLabel Left = 32 Top = 68 Width = 313 Height = 13 Caption = 'When moving to the next/previous unread message across folders' end object cbAutoColumnWidth: TCheckBox Left = 16 Top = 14 Width = 401 Height = 17 Caption = 'Automatically adjust first column width for threaded views' TabOrder = 0 end object cbNextUnread: TComboBox Left = 32 Top = 84 Width = 337 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 2 OnChange = cbNextUnreadChange Items.Strings = ( 'Confirm moving to another folder' 'Beep and move to another folder' 'Move to the other folder silently' 'Beep and stay in the current folder' 'Just stay in the current folder') end object gbMLTime: TGroupBox Left = 16 Top = 168 Width = 433 Height = 185 Caption = 'Date/Time display' TabOrder = 5 object Label10: TLabel Left = 32 Top = 24 Width = 136 Height = 13 Caption = 'Default message time format:' end object cbMLTimeFmt: TCheckBox Left = 16 Top = 72 Width = 369 Height = 17 Caption = 'Display time for today'#39's messages using this format:' TabOrder = 0 OnClick = cbMLTimeFmtClick end object cbMLWeekFmt: TCheckBox Left = 16 Top = 128 Width = 369 Height = 17 Caption = 'Display time for the current week'#39's messages using this format:' TabOrder = 1 OnClick = cbMLWeekFmtClick end object eMLTimeFmt: TEdit Left = 32 Top = 92 Width = 289 Height = 21 TabOrder = 2 end object eMLWeekFmt: TEdit Left = 32 Top = 148 Width = 289 Height = 21 TabOrder = 3 end object eMLTime: TEdit Left = 32 Top = 40 Width = 289 Height = 21 TabOrder = 4 end object bTryTime: TButton Left = 328 Top = 38 Width = 97 Height = 25 Caption = 'Check' TabOrder = 5 OnClick = bTryTimeClick end end object cbOldestThread: TCheckBox Left = 16 Top = 40 Width = 401 Height = 17 Caption = 'The oldest message begins a thread by Subject/From/To' TabOrder = 1 end object cbUseSpeaker: TCheckBox Left = 32 Top = 136 Width = 401 Height = 17 Caption = 'Use PC Speaker for beeps' TabOrder = 4 end object cbUnreadAcross: TCheckBox Left = 32 Top = 112 Width = 401 Height = 17 Caption = 'Allow search for unread messages across accounts' TabOrder = 3 end end object tsColGroups: TTabSheet HelpContext = 14070 Caption = 'Colour Groups and Font' ImageIndex = 10 object bNewCG: TButton Left = 344 Top = 16 Width = 105 Height = 25 Caption = '&New...' TabOrder = 0 OnClick = bNewCGClick end object bEditCG: TButton Left = 344 Top = 48 Width = 105 Height = 25 Caption = '&Edit' TabOrder = 1 OnClick = bEditCGClick end object bDeleteCG: TButton Left = 344 Top = 80 Width = 105 Height = 25 Caption = '&Delete' TabOrder = 2 OnClick = bDeleteCGClick end object gbMLFont: TGroupBox Left = 8 Top = 296 Width = 441 Height = 73 Caption = 'Font' TabOrder = 3 object bSelMsgListFont: TButton Tag = 2 Left = 328 Top = 24 Width = 105 Height = 25 Caption = 'Change' TabOrder = 0 OnClick = bFolderFontClick end object eMLFont: TEdit Left = 16 Top = 16 Width = 273 Height = 49 TabStop = False AutoSize = False BorderStyle = bsNone Color = clBtnFace ReadOnly = True TabOrder = 1 end end object pnListBoxAligner: TPanel Tag = 11 Left = 8 Top = 12 Width = 325 Height = 265 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 4 object lCGList: TListBox Left = 2 Top = 19 Width = 321 Height = 244 Style = lbOwnerDrawFixed Align = alClient BorderStyle = bsNone Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Reference Sans Serif' Font.Style = [] ItemHeight = 16 ParentFont = False PopupMenu = pmCGPopup TabOrder = 0 OnClick = lCGListClick OnDblClick = bEditCGClick OnDrawItem = lCGListDrawItem end object hList: THeaderControl Left = 2 Top = 2 Width = 321 Height = 17 Sections = < item AllowClick = False ImageIndex = -1 MaxWidth = 200 MinWidth = 200 Text = 'Name' Width = 200 end item AllowClick = False ImageIndex = -1 MaxWidth = 130 MinWidth = 130 Text = 'Handle' Width = 130 end> end end end object tsViewModes: TTabSheet HelpContext = 14224 Caption = 'View Modes' ImageIndex = 17 OnShow = tsViewModesShow object Label7: TLabel Left = 12 Top = 4 Width = 60 Height = 13 Caption = 'View modes:' end object btnAddVM: TButton Left = 352 Top = 20 Width = 102 Height = 25 Caption = '&New' TabOrder = 1 OnClick = btnAddVMClick end object btnDeleteVM: TButton Left = 352 Top = 116 Width = 102 Height = 25 Caption = '&Delete' Enabled = False TabOrder = 4 OnClick = btnDeleteVMClick end object btnEditVM: TButton Left = 352 Top = 84 Width = 102 Height = 25 Caption = '&Edit ...' TabOrder = 3 OnClick = btnEditVMClick end object lvModes: TListView Left = 8 Top = 24 Width = 337 Height = 345 Columns = < item Caption = 'Name' Width = 305 end> HideSelection = False RowSelect = True PopupMenu = pmVModes SortType = stData TabOrder = 0 ViewStyle = vsReport OnCompare = lvModesCompare OnDblClick = lvModesDblClick OnEdited = lvModesEdited OnEditing = lvModesEditing OnSelectItem = lvModesSelectItem end object btnUseBy: TButton Left = 352 Top = 148 Width = 103 Height = 25 Caption = '&Use by ...' TabOrder = 5 OnClick = btnUseByClick end object btnDuplicate: TButton Left = 352 Top = 52 Width = 103 Height = 25 Caption = 'New &from ...' TabOrder = 2 OnClick = btnDuplicateClick end end object tsHeaders: TTabSheet HelpContext = 14224 Caption = 'Message Headers' ImageIndex = 15 object Label16: TLabel Left = 8 Top = 104 Width = 65 Height = 13 Caption = '&Header fields:' end object gbMsgHeader: TGroupBox Left = 8 Top = 8 Width = 433 Height = 81 TabOrder = 0 object lbHeadersDesc: TLabel Left = 8 Top = 16 Width = 417 Height = 57 AutoSize = False Caption = 'Here, you can edit the list of the message header fields that ca' + 'n be displayed at the Header of the message preview pane. You ca' + 'n also set/edit those fields in the message editor and refer to ' + 'them in templates using %HDRhhh and %HDRhhh='#39'...'#39' macros where h' + 'hh is the header'#39's RFC name' WordWrap = True end end object lvHeaders: TListView Left = 8 Top = 120 Width = 325 Height = 241 Columns = < item Caption = 'Display as' Width = 100 end item Caption = 'RFC Name' Width = 100 end item Caption = 'Address list' end item Caption = 'Editor' end item Caption = 'Scroll' end> HideSelection = False ReadOnly = True RowSelect = True PopupMenu = pmHeaders TabOrder = 1 ViewStyle = vsReport OnChange = lvHeadersChange end object bAddHeader: TButton Left = 344 Top = 120 Width = 105 Height = 25 Caption = '&Add' TabOrder = 2 OnClick = bAddHeaderClick end object bEditHeader: TButton Left = 344 Top = 160 Width = 105 Height = 25 Caption = '&Edit' TabOrder = 3 OnClick = bEditHeaderClick end object bDelHeader: TButton Left = 344 Top = 196 Width = 105 Height = 25 Caption = '&Delete' TabOrder = 4 OnClick = bDelHeaderClick end object bMoveHeaderUp: TButton Tag = -1 Left = 344 Top = 304 Width = 105 Height = 25 Caption = 'Move Up' TabOrder = 5 OnClick = bMoveHeaderUpClick end object bMoveHeaderDown: TButton Tag = 1 Left = 344 Top = 336 Width = 105 Height = 25 Caption = 'Move Down' TabOrder = 6 OnClick = bMoveHeaderUpClick end end object tsHeaderLook: TTabSheet HelpContext = 14221 Caption = 'Header Layout' ImageIndex = 18 object Label19: TLabel Left = 8 Top = 208 Width = 74 Height = 13 Caption = 'Sample header:' end object gbHeaderFont: TGroupBox Left = 8 Top = 16 Width = 441 Height = 65 Caption = '&Font' TabOrder = 0 object eHdrFont: TEdit Left = 16 Top = 24 Width = 305 Height = 33 BorderStyle = bsNone Color = clBtnFace ReadOnly = True TabOrder = 0 end object bHeaderFont: TButton Tag = 1 Left = 336 Top = 22 Width = 97 Height = 25 Caption = 'Change...' TabOrder = 1 OnClick = bFolderFontClick end end object gbHdrColour: TGroupBox Left = 8 Top = 88 Width = 441 Height = 113 Caption = 'Colours' TabOrder = 1 object Label17: TLabel Left = 175 Top = 52 Width = 20 Height = 13 Alignment = taRightJustify Caption = '&Item' FocusControl = cbHdrColourItem end object Label18: TLabel Left = 165 Top = 82 Width = 30 Height = 13 Alignment = taRightJustify Caption = '&Colour' FocusControl = cbHdrColour end object Label20: TLabel Left = 91 Top = 19 Width = 160 Height = 13 Alignment = taRightJustify Caption = '&Set colours for the header pane in' FocusControl = cbHdrViewer end object cbHdrColourItem: TComboBox Left = 200 Top = 48 Width = 233 Height = 21 Style = csDropDownList ItemHeight = 13 ItemIndex = 0 TabOrder = 1 Text = 'Field name text' OnChange = cbHdrColourItemChange Items.Strings = ( 'Field name text' 'Field name background' 'Field value text' 'Field value background' 'Selected field text' 'Selected field background' 'Hot link text' 'Field separator') end object cbHdrColour: TColorBox Left = 200 Top = 80 Width = 233 Height = 22 Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbIncludeDefault, cbCustomColor, cbPrettyNames] ItemHeight = 16 TabOrder = 2 OnChange = cbHdrColourChange end object cbHdrViewer: TComboBox Left = 256 Top = 16 Width = 177 Height = 21 Style = csDropDownList ItemHeight = 13 ItemIndex = 0 TabOrder = 0 Text = 'Viewer' OnChange = cbHdrViewerChange Items.Strings = ( 'Viewer' 'Editor') end end object Panel2: TPanel Tag = 11 Left = 8 Top = 224 Width = 441 Height = 145 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 2 object gInfo: TAddressGrid Left = 2 Top = 2 Width = 437 Height = 141 Align = alClient BorderStyle = bsNone ColCount = 2 DefaultRowHeight = 20 RowCount = 1 FixedRows = 0 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing, goAlwaysShowEditor, goThumbTracking] TabOrder = 0 SimpleLook = False ColWidths = ( 16 421) end end end object tsMailTicker: TTabSheet HelpContext = 14108 Caption = 'Mail Ticker' ImageIndex = 19 object lMailTicker: TLabel Left = 16 Top = 20 Width = 221 Height = 13 AutoSize = False Caption = 'Display MailTicker(TM)' FocusControl = cbMailTicker end object Label23: TLabel Left = 16 Top = 121 Width = 30 Height = 13 Alignment = taRightJustify Caption = '&Colour' FocusControl = cbTickerColour end object Label22: TLabel Left = 208 Top = 122 Width = 36 Height = 13 Caption = 'Opacity' end object gbxMTFont: TGroupBox Left = 8 Top = 48 Width = 441 Height = 65 Caption = '&Font' TabOrder = 1 object eMTickerFont: TEdit Left = 16 Top = 24 Width = 305 Height = 33 BorderStyle = bsNone Color = clBtnFace ReadOnly = True TabOrder = 0 end object bMTFontChange: TButton Tag = 3 Left = 336 Top = 22 Width = 97 Height = 25 Caption = 'Change...' TabOrder = 1 OnClick = bFolderFontClick end end object cbMailTicker: TComboBox Left = 264 Top = 16 Width = 161 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 0 Items.Strings = ( 'Automatically' 'Always' 'Hide') end object cbTickerColour: TColorBox Left = 14 Top = 140 Width = 167 Height = 22 Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbIncludeDefault, cbCustomColor, cbPrettyNames] ItemHeight = 16 TabOrder = 2 OnChange = cbHdrColourChange end object tbMTOpacity: TTrackBar Left = 199 Top = 136 Width = 249 Height = 40 LineSize = 8 Max = 256 Min = 48 PageSize = 32 Frequency = 8 Position = 192 TabOrder = 3 end object cbMTThin: TCheckBox Left = 16 Top = 200 Width = 385 Height = 17 Caption = 'Display MailTicker in Thin View' TabOrder = 5 end object gbxMTScrollSpeed: TGroupBox Left = 8 Top = 252 Width = 216 Height = 81 Caption = 'Scrolling speed' TabOrder = 9 object rbMTScrollFast: TRadioButton Left = 20 Top = 16 Width = 145 Height = 17 Caption = 'Faster' TabOrder = 0 end object rbMTScrollNormal: TRadioButton Left = 20 Top = 36 Width = 149 Height = 17 Caption = 'Normal' TabOrder = 1 end object rbMTScrollSlower: TRadioButton Left = 20 Top = 56 Width = 149 Height = 17 Caption = 'Slower' TabOrder = 2 end end object cbMTAlwaysTop: TCheckBox Left = 16 Top = 224 Width = 405 Height = 17 Caption = 'Always on top' TabOrder = 6 end object bMTPreview: TButton Tag = 1 Left = 308 Top = 343 Width = 140 Height = 25 Caption = 'Apply Changes' TabOrder = 11 OnClick = bMTPreviewClick end object cbMTAutoZoom: TCheckBox Left = 16 Top = 176 Width = 385 Height = 17 Caption = 'Auto-zoom' TabOrder = 4 end object bMTFolders: TButton Tag = 1 Left = 321 Top = 180 Width = 120 Height = 25 Caption = 'Folders...' TabOrder = 7 OnClick = bMTFoldersClick end object gbxMTMessages: TGroupBox Left = 233 Top = 252 Width = 216 Height = 80 Caption = 'Messages' TabOrder = 10 object cbMTMsgNormal: TCheckBox Left = 20 Top = 16 Width = 133 Height = 17 Caption = 'Normal' TabOrder = 0 end object cbMTMsgHigh: TCheckBox Left = 20 Top = 36 Width = 133 Height = 17 Caption = 'High' TabOrder = 1 end object cbMTMsgLow: TCheckBox Left = 20 Top = 56 Width = 133 Height = 17 Caption = 'Low' TabOrder = 2 end end object bMTMsgAge: TButton Tag = 1 Left = 321 Top = 212 Width = 120 Height = 25 Caption = 'Age Limits...' TabOrder = 8 OnClick = bMTMsgAgeClick end end object tbWarnings: TTabSheet HelpContext = 14226 Caption = 'Protection' object gbVirus: TGroupBox Left = 8 Top = 8 Width = 441 Height = 297 Caption = 'Virus/Trojan Alert (attachment opening)' TabOrder = 0 object Label4: TLabel Left = 16 Top = 56 Width = 141 Height = 13 Caption = '&Disable opening of these files:' FocusControl = eDisableMask end object Label5: TLabel Left = 16 Top = 112 Width = 219 Height = 13 Caption = '&Enable opening of these files without any alert:' FocusControl = eEnableMask end object Label6: TLabel Left = 16 Top = 168 Width = 188 Height = 13 Caption = '&Always display warning about these files' FocusControl = eWarnMask end object lMaskDesc: TLabel Left = 16 Top = 224 Width = 409 Height = 57 AutoSize = False Caption = 'NOTE: use "wildcards" to specify a file type that is allowed. Us' + 'e commas to separate different file masks. The *.* mask means "a' + 'ny file".' WordWrap = True end object cbDoubleExt: TCheckBox Left = 16 Top = 24 Width = 385 Height = 17 Caption = 'Display additional alert when a file has double extension (e.g.' + ' .TXT.EXE)' TabOrder = 0 end object eDisableMask: TEdit Left = 16 Top = 72 Width = 409 Height = 21 TabOrder = 1 end object eEnableMask: TEdit Left = 16 Top = 128 Width = 409 Height = 21 TabOrder = 2 end object eWarnMask: TEdit Left = 16 Top = 184 Width = 409 Height = 21 TabOrder = 3 end end object cbWarnSentExit: TCheckBox Left = 16 Top = 328 Width = 393 Height = 17 Caption = '&Warn about unsent mail in Outbox folders on exit' TabOrder = 1 Visible = False end end object tsAntivirus: TTabSheet HelpContext = 36000 Caption = 'Anti-Virus' ImageIndex = 11 object GroupBox1: TGroupBox Left = 8 Top = 8 Width = 449 Height = 126 Caption = 'Virus Checking Plug-ins' TabOrder = 0 object lAVItems: TListView Left = 8 Top = 16 Width = 329 Height = 97 Columns = < item Caption = 'Name' Width = 150 end item Caption = 'Version' end item Caption = 'Status' end item Caption = 'DLL path' Width = 200 end> ReadOnly = True RowSelect = True PopupMenu = pmItems TabOrder = 0 ViewStyle = vsReport OnChange = lAVItemsChange OnDblClick = bConfigClick end object bAddAV: TButton Left = 344 Top = 16 Width = 97 Height = 25 Caption = '&Add' TabOrder = 1 OnClick = mExternalClick end object bConfig: TButton Left = 344 Top = 52 Width = 97 Height = 25 Caption = '&Configure' Enabled = False TabOrder = 2 OnClick = bConfigClick end object bDeleteAV: TButton Left = 344 Top = 88 Width = 97 Height = 25 Caption = '&Delete' TabOrder = 3 OnClick = bDeleteAVClick end end object GroupBox3: TGroupBox Left = 8 Top = 140 Width = 449 Height = 233 Caption = 'Default settings' TabOrder = 1 object cbOpenAttach: TCheckBox Left = 8 Top = 160 Width = 433 Height = 17 Caption = 'Check attachments for viruses &before opening them from The Bat!' TabOrder = 2 end object cbMail: TCheckBox Left = 8 Top = 24 Width = 420 Height = 17 Caption = 'Check incoming mail for viruses' TabOrder = 0 end object GroupBox4: TGroupBox Left = 24 Top = 48 Width = 409 Height = 97 Caption = 'When a virus detected' TabOrder = 1 object Label13: TLabel Left = 16 Top = 48 Width = 90 Height = 13 Caption = '&Perform this action:' end object cbSendNote: TCheckBox Left = 16 Top = 24 Width = 281 Height = 17 Caption = 'Send ¬ification to the sender' TabOrder = 0 OnClick = cbSendNoteClick end object bAVTemplate: TButton Left = 304 Top = 20 Width = 91 Height = 25 Caption = '&Template' Enabled = False TabOrder = 1 OnClick = bAVTemplateClick end object cbAction: TComboBox Left = 16 Top = 64 Width = 377 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 2 Items.Strings = ( 'Try to cure infected parts' 'Remove infected parts' 'Forward the message to self' 'Delete the message' 'Move to the Quarantine folder') end end object cbSaveAttach: TCheckBox Left = 8 Top = 184 Width = 433 Height = 17 Caption = 'Check attachments before the user saves them to the disk' TabOrder = 3 end object cbCheckOutgoing: TCheckBox Left = 8 Top = 208 Width = 433 Height = 17 Caption = 'Check outgoing mail for viruses' TabOrder = 4 end end end object tsAntispam: TTabSheet HelpContext = 34000 Caption = 'Anti-spam' ImageIndex = 12 object lSpamIntro: TLabel Left = 16 Top = 140 Width = 433 Height = 65 AutoSize = False Caption = 'Anti-SPAM plug-ins check messages on arrival and assign some sco' + 're (out of 100) to each checked message. Because scoring methods' + ' are different for each plug-in, we leave it up to you to which ' + 'score will be used...' WordWrap = True end object gbAntiSpam: TGroupBox Left = 8 Top = 8 Width = 449 Height = 126 Caption = 'Anti-SPAM Plug-ins' TabOrder = 0 object lSpam: TListView Left = 8 Top = 16 Width = 329 Height = 97 Columns = < item Caption = 'Name' Width = 150 end item Caption = 'Version' end item Caption = 'Status' end item Caption = 'DLL path' Width = 200 end> HideSelection = False ReadOnly = True RowSelect = True PopupMenu = pmPlugins TabOrder = 0 ViewStyle = vsReport OnChange = lSpamChange end object bAddSpam: TButton Left = 344 Top = 16 Width = 97 Height = 25 Caption = '&Add' TabOrder = 1 OnClick = bAddSpamClick end object bConfigSpam: TButton Left = 344 Top = 52 Width = 97 Height = 25 Caption = '&Configure' Enabled = False TabOrder = 2 OnClick = bConfigSpamClick end object bDeleteSpam: TButton Left = 344 Top = 88 Width = 97 Height = 25 Caption = '&Delete' Enabled = False TabOrder = 3 OnClick = bDeleteSpamClick end end object rgSpamScoreType: TRadioGroup Left = 16 Top = 204 Width = 441 Height = 41 Caption = 'Out of &100 score to be used for actions below:' Columns = 3 ItemIndex = 0 Items.Strings = ( 'A&verage' 'Ma&ximal' '&Minimal') TabOrder = 1 end object cbDeleteJunk: TCheckBox Left = 16 Top = 268 Width = 377 Height = 17 Caption = 'Delete a message if the score is greater than' TabOrder = 2 OnClick = cbDeleteJunkClick end object cbMoveJunk: TCheckBox Left = 16 Top = 288 Width = 377 Height = 17 Caption = 'Move a message to the Junk folder if the score is greater than' TabOrder = 4 OnClick = cbMoveJunkClick end object cbMarkJunkRead: TCheckBox Left = 32 Top = 310 Width = 369 Height = 17 Caption = 'Mark stored junk mail as read' TabOrder = 6 end object cbGlobalJunk: TCheckBox Left = 16 Top = 352 Width = 369 Height = 17 Caption = 'Use the common Junk folder' TabOrder = 8 end object cbMoveJunkToJunk: TCheckBox Left = 16 Top = 332 Width = 385 Height = 17 Caption = 'Move messages marked as junk to the Junk folder' TabOrder = 7 end object eDelJunk: TXSpinEdit Left = 400 Top = 262 Width = 57 Height = 21 TabOrder = 3 Text = '1' MinValue = 0 MaxValue = 99 Value = 1 Step = 1 end object eMoveJunk: TXSpinEdit Left = 400 Top = 286 Width = 57 Height = 21 TabOrder = 5 Text = '1' MinValue = 0 MaxValue = 99 Value = 1 Step = 1 end end object tsEditorViewer: TTabSheet Caption = 'Viewer/Editor' ImageIndex = 13 object lPlainTextViewer: TLabel Left = 16 Top = 80 Width = 146 Height = 13 Caption = '&View plain text messages using' FocusControl = cbViewType end object lViewerIntro: TLabel Left = 16 Top = 8 Width = 425 Height = 73 AutoSize = False Caption = 'It is possible to view messages using different kind of text vie' + 'wers. Those viewers differ by the set of features provided and l' + 'imitations applied (for example, the plain text viewer supports ' + 'vertical block selection but requires fixed width fonts only). P' + 'lease choose the viewer suitable for your needs.' WordWrap = True end object lEditorIntro: TLabel Left = 16 Top = 232 Width = 433 Height = 105 AutoSize = False Caption = 'You can choose which text editor you are going to use by default' + '. The MicroEd editor is a professional editor made specifically ' + 'for writing e-mail messages that provides WYSIWYG editing, While' + '-You-Type spell checking, quotation control and working with fix' + 'ed width fonts only. The Windows Editor is a plain text editor w' + 'ith a standard set of features. Please choose which editor you w' + 'ish to use by default (you can switch editors right in the messa' + 'ge editor using the "Options|Message Format" menu)' WordWrap = True end object Label11: TLabel Left = 16 Top = 336 Width = 131 Height = 13 Caption = '&Default message text editor:' FocusControl = cbEditor end object lHTMLViewMode: TLabel Left = 16 Top = 124 Width = 134 Height = 13 Caption = 'View HTML messages using' end object lTextHTMLViewMode: TLabel Left = 16 Top = 168 Width = 276 Height = 13 Caption = 'View messages with alternative layout (Text and HTML) as' end object cbViewType: TComboBox Left = 16 Top = 96 Width = 433 Height = 21 Style = csDropDownList ItemHeight = 13 ItemIndex = 0 TabOrder = 0 Text = 'Plain Text Viewer (fast - fixed width fonts only)' OnChange = cbViewTypeChange Items.Strings = ( 'Plain Text Viewer (fast - fixed width fonts only)' 'Rich Text/HTML Viewer (slower but with proportional fonts)') end object cbEditor: TComboBox Left = 16 Top = 352 Width = 433 Height = 21 Style = csDropDownList ItemHeight = 13 ItemIndex = 0 TabOrder = 3 Text = 'Plain Text (MicroEd) - MicroStar compatible, fixed width fonts ' + 'only' Items.Strings = ( 'Plain Text (MicroEd) - MicroStar compatible, fixed width fonts ' + 'only' 'Plain Text (Windows) - Windows-compatible, proportional fonts' 'HTML with alternative plain text part' 'HTML only') end object cbHTMLViewMode: TComboBox Left = 16 Top = 140 Width = 433 Height = 21 Style = csDropDownList ItemHeight = 13 ItemIndex = 0 TabOrder = 1 Text = 'HTML only' Items.Strings = ( 'HTML only' 'HTML and Plain Text version' 'Plain Text version and HTML' 'Plain Text version only') end object cbTextHTMLViewMode: TComboBox Left = 16 Top = 184 Width = 433 Height = 21 Style = csDropDownList ItemHeight = 13 ItemIndex = 0 TabOrder = 2 Text = 'HTML only' Items.Strings = ( 'HTML only' 'HTML and Plain Text version' 'Plain Text version and HTML' 'Plain Text version only') end object cbUseSmiley: TCheckBox Left = 16 Top = 212 Width = 433 Height = 17 Caption = 'Use smiley icons in HTML viewer' TabOrder = 4 end end object tsEditor: TTabSheet HelpContext = 10027 Caption = 'Editor preferences' ImageIndex = 7 object GroupBox5: TGroupBox Left = 8 Top = 8 Width = 449 Height = 129 Caption = 'General (common for all editors)' TabOrder = 0 object lWrapText: TLabel Left = 16 Top = 24 Width = 58 Height = 13 Caption = '&Wrap text at' end object lWrapChars: TLabel Left = 80 Top = 44 Width = 50 Height = 13 Caption = 'characters' end object lAutoSave: TLabel Left = 184 Top = 24 Width = 77 Height = 13 Caption = 'A&uto-save every' end object lAutoSaveSecs: TLabel Left = 248 Top = 44 Width = 17 Height = 13 Caption = 'sec' end object lQuote: TLabel Left = 16 Top = 72 Width = 78 Height = 13 Caption = 'Quote name limit' end object lQuoteLimitChars: TLabel Left = 80 Top = 92 Width = 50 Height = 13 Caption = 'characters' end object cbWrapQuotes: TCheckBox Left = 184 Top = 88 Width = 257 Height = 21 Caption = 'Smart Wrapping of quoted text' TabOrder = 3 WordWrap = True end object eLeft: TXSpinEdit Left = 16 Top = 40 Width = 57 Height = 21 TabOrder = 0 Text = '0' MinValue = 0 MaxValue = 32000 Value = 0 Step = 1 end object eQuoteLen: TXSpinEdit Left = 16 Top = 88 Width = 57 Height = 21 TabOrder = 2 Text = '1' MinValue = 1 MaxValue = 60 Value = 1 Step = 1 end object eAutosave: TXSpinEdit Left = 184 Top = 40 Width = 57 Height = 21 TabOrder = 1 Text = '0' MinValue = 0 MaxValue = 10000000 Value = 0 Step = 10 end end object GroupBox6: TGroupBox Left = 8 Top = 144 Width = 449 Height = 225 Caption = 'MicroEd-specific options' TabOrder = 1 object gbPaste: TGroupBox Left = 224 Top = 24 Width = 217 Height = 57 Caption = 'Pasting different block type' TabOrder = 7 object cbAutoInsert: TCheckBox Left = 8 Top = 16 Width = 201 Height = 17 Caption = 'S&kip prompt' TabOrder = 0 end object cbAutoAdjust: TCheckBox Left = 8 Top = 32 Width = 201 Height = 17 Caption = 'Adjust auto&matically' TabOrder = 1 end end object gbBlocks: TGroupBox Left = 224 Top = 88 Width = 217 Height = 57 Caption = 'Blocks' TabOrder = 8 object cbPersistentBlock: TCheckBox Left = 8 Top = 16 Width = 185 Height = 17 Caption = '&Persistent blocks' TabOrder = 0 end object cbOverwriteBlock: TCheckBox Left = 8 Top = 32 Width = 201 Height = 17 Caption = 'O&verwrite blocks' TabOrder = 1 end end object gbShape: TGroupBox Left = 224 Top = 152 Width = 217 Height = 57 Caption = 'Cursor shape' TabOrder = 9 object cbBlockInsert: TCheckBox Left = 8 Top = 16 Width = 201 Height = 17 Caption = 'Blo&ck insert cursor' TabOrder = 0 end object cbBriefCursor: TCheckBox Left = 8 Top = 32 Width = 201 Height = 17 Caption = 'BRI&EF cursor shape' TabOrder = 1 end end object cbAutowrap: TCheckBox Left = 16 Top = 32 Width = 201 Height = 17 Caption = '&Auto-wrap' TabOrder = 0 end object cbAutoFmt: TCheckBox Left = 16 Top = 58 Width = 201 Height = 17 Caption = 'Auto-forma&t' TabOrder = 1 end object cbWrapJustify: TCheckBox Left = 16 Top = 85 Width = 201 Height = 17 Caption = '&Justify on wrap' TabOrder = 2 end object cbSmartTab: TCheckBox Left = 16 Top = 112 Width = 201 Height = 17 Caption = #39'&Smart'#39' tabs' TabOrder = 3 end object cbAutoIndent: TCheckBox Left = 16 Top = 138 Width = 201 Height = 17 Caption = 'Auto &Indent' TabOrder = 4 end object cbBSIndent: TCheckBox Left = 16 Top = 165 Width = 201 Height = 17 Caption = '&Backspace unindents' TabOrder = 5 end object cbFindAtCursor: TCheckBox Left = 16 Top = 192 Width = 201 Height = 17 Caption = '&Find text at cursor' TabOrder = 6 end end end object tsEditorView: TTabSheet HelpContext = 14221 Caption = 'Plain Text/MicroEd' ImageIndex = 8 object gbMicroEdView: TGroupBox Left = 8 Top = 8 Width = 449 Height = 361 Caption = 'Plain text viewer/MicroEd layout' TabOrder = 0 object Label12: TLabel Left = 8 Top = 272 Width = 24 Height = 13 Caption = '&Font:' FocusControl = cbPlainFont end object Label14: TLabel Left = 272 Top = 272 Width = 23 Height = 13 Caption = '&Size:' FocusControl = cbPlainFontSize end object Label15: TLabel Left = 8 Top = 292 Width = 23 Height = 13 Caption = '&Item:' end object lPlainColor: TLabel Left = 272 Top = 292 Width = 33 Height = 13 Caption = '&Colour:' end object Panel1: TPanel Tag = 11 Left = 8 Top = 16 Width = 433 Height = 233 BevelOuter = bvNone BorderWidth = 2 TabOrder = 0 OnMouseDown = pnViewerMouseDown object eMsg: TTextEditor Left = 2 Top = 2 Width = 429 Height = 229 BgColor = clBlack TextColor = clBlack SelColor = clBlack SelBgColor = clBlack QuoteColor = clBlack RefColor = clBlack Kludge1Color = clBlack Kludge2Color = clBlack Kludge3Color = clBlack ReadOnly = False FontCharset = 1 Enabled = False TabOrder = 0 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Pitch = fpFixed Font.Style = [] Align = alClient end end object cbPlainFont: TComboBox Left = 88 Top = 268 Width = 169 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 1 OnChange = cbPlainFontChange end object cbPlainFontSize: TComboBox Left = 352 Top = 268 Width = 89 Height = 21 ItemHeight = 13 TabOrder = 2 OnChange = cbPlainFontChange OnKeyPress = cbMVSizeKeyPress Items.Strings = ( '8' '9' '10' '12' '14' '16' '18' '20') end object cbPlainItem: TComboBox Left = 8 Top = 308 Width = 249 Height = 21 Style = csDropDownList ItemHeight = 13 ItemIndex = 0 TabOrder = 3 Text = 'Background' OnChange = cbPlainItemChange Items.Strings = ( 'Background' 'Plain text' 'Selection background' 'Selected text' 'Quotation (Odd)' 'Quotation (Even)' 'References') end object cbPlainBold: TCheckBox Tag = 2 Left = 8 Top = 336 Width = 137 Height = 17 Caption = '&Bold' TabOrder = 5 OnClick = cbPlainULClick end object cbPlainItalic: TCheckBox Tag = 1 Left = 152 Top = 336 Width = 137 Height = 17 Caption = 'I&talic' TabOrder = 6 OnClick = cbPlainULClick end object cbPlainUL: TCheckBox Left = 296 Top = 336 Width = 145 Height = 17 Caption = '&Underline' TabOrder = 7 OnClick = cbPlainULClick end object cbMEColor: TColorBox Left = 272 Top = 308 Width = 169 Height = 22 Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbIncludeDefault, cbCustomColor, cbPrettyNames] ItemHeight = 16 TabOrder = 4 OnChange = cbMEColorChange end end end object tsViewer: TTabSheet HelpContext = 14221 Caption = 'HTML/Windows Editor' object gb_HTMLView: TGroupBox Left = 8 Top = 8 Width = 449 Height = 361 Caption = 'HTML/Windows Editor layout' TabOrder = 0 object lMVSize: TLabel Left = 272 Top = 312 Width = 23 Height = 13 Caption = '&Size:' FocusControl = cbMVSize end object lmvFont: TLabel Left = 8 Top = 312 Width = 24 Height = 13 Caption = '&Font:' FocusControl = cbMVFont end object lMVColor: TLabel Left = 272 Top = 264 Width = 33 Height = 13 Caption = '&Colour:' end object Label8: TLabel Left = 8 Top = 264 Width = 23 Height = 13 Caption = '&Item:' end object pnViewer: TPanel Tag = 11 Left = 8 Top = 16 Width = 425 Height = 241 BevelOuter = bvNone BorderWidth = 2 TabOrder = 0 OnMouseDown = pnViewerMouseDown end object cbViewItem: TComboBox Left = 8 Top = 280 Width = 249 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 1 OnChange = cbViewItemChange Items.Strings = ( 'Regular Text' 'Background' 'Quoted Text (odd)' 'Quotation Prefix (odd)' 'Hyper Links' 'RFC 822 Headers' 'Fixed Width Text' 'Signature Text' 'Quoted Text (even)' 'Quotation Prefix (even)') end object cbMVSize: TComboBox Left = 352 Top = 308 Width = 89 Height = 21 ItemHeight = 13 TabOrder = 3 OnChange = cbMVSizeChange OnKeyPress = cbMVSizeKeyPress Items.Strings = ( '8' '9' '10' '12' '14' '16' '18' '20') end object cbMVBold: TCheckBox Tag = 2 Left = 8 Top = 336 Width = 137 Height = 17 Caption = '&Bold' TabOrder = 4 OnClick = cbMVUnderlineClick end object cbMVFont: TComboBox Left = 104 Top = 308 Width = 153 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 2 OnChange = cbMVFontChange end object cbMVItalic: TCheckBox Tag = 1 Left = 152 Top = 336 Width = 137 Height = 17 Caption = 'I&talic' TabOrder = 5 OnClick = cbMVUnderlineClick end object cbMVUnderline: TCheckBox Left = 296 Top = 336 Width = 134 Height = 17 Caption = '&Underline' TabOrder = 6 OnClick = cbMVUnderlineClick end object cbRTVColor: TColorBox Left = 272 Top = 280 Width = 169 Height = 22 Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbIncludeDefault, cbCustomColor, cbPrettyNames] ItemHeight = 16 TabOrder = 7 OnChange = cbRTVColorChange end end end object tsSrcView: TTabSheet HelpContext = 14221 Caption = 'Source Viewer' object lItem: TLabel Left = 8 Top = 328 Width = 23 Height = 13 Caption = 'Item:' end object lSrcSample: TLabel Left = 8 Top = 8 Width = 100 Height = 13 Caption = 'Sample Source view:' end object pnView: TPanel Tag = 11 Left = 8 Top = 24 Width = 433 Height = 297 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 0 end object cbItem: TComboBox Left = 8 Top = 344 Width = 337 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 1 Items.Strings = ( 'Font' 'Header fields colour' 'Header text colour' 'Plain text colour' 'MIME part header fields colour' 'MIME part header text colour' 'MIME preamble/postamble colour' 'MIME part boundary (odd) colour' 'MIME part boundary (even) colour') end object bChangeSrc: TButton Left = 360 Top = 342 Width = 91 Height = 25 Caption = '&Change...' TabOrder = 2 OnClick = bChangeSrcClick end end object tsXLAT: TTabSheet HelpContext = 10037 Caption = 'Character Sets (XLAT)' ImageIndex = 14 object bAddXLAT: TButton Left = 368 Top = 16 Width = 89 Height = 25 Caption = '&Add...' TabOrder = 0 OnClick = bAddXLATClick end object bDeleteXLAT: TButton Left = 368 Top = 48 Width = 89 Height = 25 Caption = '&Delete' Enabled = False TabOrder = 1 OnClick = bDeleteXLATClick end object bEditXLAT: TButton Left = 368 Top = 84 Width = 89 Height = 25 Caption = '&Edit...' Enabled = False TabOrder = 2 OnClick = bEditXLATClick end object bResetXLAT: TButton Left = 368 Top = 344 Width = 89 Height = 25 Caption = '&Reset' TabOrder = 3 OnClick = bResetXLATClick end object lTables: TListView Left = 8 Top = 16 Width = 353 Height = 353 Columns = < item Caption = 'Name' Width = 200 end item Caption = 'Character set' Width = 140 end> HideSelection = False ReadOnly = True RowSelect = True TabOrder = 4 ViewStyle = vsReport OnChange = lTablesChange OnDblClick = bEditXLATClick end end object tsHotkeys: TTabSheet HelpContext = 14065 Caption = 'System Hot Keys' ImageIndex = 15 object lComment: TLabel Left = 16 Top = 16 Width = 425 Height = 49 AutoSize = False Caption = 'You can define system Hot-Keys for functions you can use even wh' + 'en other applications are active.' WordWrap = True end object lHotKeys: TListView Left = 8 Top = 72 Width = 433 Height = 289 Columns = < item Caption = 'Function' Width = 250 end item Caption = 'Hotkey' Width = 178 end> ReadOnly = True RowSelect = True PopupMenu = hkPopup TabOrder = 0 ViewStyle = vsReport OnDblClick = mEditHKClick OnEnter = lHotKeysEnter end end object tsPlugins: TTabSheet HelpContext = 14225 Caption = 'Plug-Ins' ImageIndex = 16 object lvPlugIns: TListView Left = 8 Top = 16 Width = 449 Height = 321 Columns = < item Caption = 'Name' Width = 150 end item Caption = 'Version' end item Caption = 'Status' end item Caption = 'Scope' Width = 80 end item Caption = 'DLL path' Width = 200 end> HideSelection = False ReadOnly = True RowSelect = True PopupMenu = pmPlugins TabOrder = 0 ViewStyle = vsReport OnChange = lvPlugInsChange end object bAddPlugin: TButton Left = 8 Top = 344 Width = 97 Height = 25 Caption = '&Add' TabOrder = 1 OnClick = bAddSpamClick end object bDelPlugin: TButton Left = 125 Top = 344 Width = 97 Height = 25 Caption = '&Delete' Enabled = False TabOrder = 2 OnClick = bDeleteSpamClick end object bConfigPlugin: TButton Left = 242 Top = 344 Width = 97 Height = 25 Caption = '&Configure' Enabled = False TabOrder = 3 OnClick = bConfigSpamClick end object bInfoPlugIn: TButton Left = 360 Top = 344 Width = 97 Height = 25 Caption = '&Information' Enabled = False TabOrder = 4 OnClick = bInfoPlugInClick end end end object bOK: TButton Left = 328 Top = 416 Width = 97 Height = 25 Caption = '&OK' Default = True ModalResult = 1 TabOrder = 2 OnClick = bOKClick end object bCancel: TButton Left = 440 Top = 416 Width = 97 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 3 end object bHelp: TButton Left = 552 Top = 416 Width = 97 Height = 25 Caption = 'Help' TabOrder = 4 OnClick = bHelpClick end object dFont: TFontDialog Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MinFontSize = 20 Options = [fdLimitSize] Left = 8 Top = 416 end object dColor: TColorDialog Left = 72 Top = 416 end object pmCGPopup: TPopupMenu OnPopup = pmCGPopupPopup Left = 173 Top = 416 object mNewCG: TMenuItem Caption = '&New' ShortCut = 45 OnClick = bNewCGClick end object mEditCG: TMenuItem Caption = '&Edit' ShortCut = 13 OnClick = bEditCGClick end object mDeleteCG: TMenuItem Caption = '&Delete' ShortCut = 46 OnClick = bDeleteCGClick end end object dOpen: TOpenDialog DefaultExt = 'BAV' Options = [ofHideReadOnly, ofNoChangeDir, ofEnableSizing] Left = 40 Top = 416 end object pmItems: TPopupMenu OnPopup = pmItemsPopup Left = 104 Top = 416 object mConfig: TMenuItem Caption = '&Configure' Default = True ShortCut = 13 OnClick = mConfigClick end object mAddAV: TMenuItem Caption = '&Add' ShortCut = 45 OnClick = mExternalClick end object mDelete: TMenuItem Caption = '&Delete' ShortCut = 46 OnClick = mDeleteClick end object mMoveUp: TMenuItem Tag = -1 Caption = 'Move &up' ShortCut = 16422 OnClick = mMoveUpClick end object mDown: TMenuItem Tag = 1 Caption = 'Move d&own' ShortCut = 16424 OnClick = mMoveUpClick end end object hkPopup: TPopupMenu OnPopup = hkPopupPopup Left = 216 Top = 416 object mEditHK: TMenuItem Caption = '&Edit' ShortCut = 13 OnClick = mEditHKClick end object mClearHK: TMenuItem Caption = '&Clear' ShortCut = 46 OnClick = mClearHKClick end end object pmHeaders: TPopupMenu Left = 256 Top = 416 object pmhAdd: TMenuItem Caption = '&Add' ShortCut = 45 OnClick = bAddHeaderClick end object pmhEdit: TMenuItem Caption = '&Edit' ShortCut = 13 OnClick = bEditHeaderClick end object pmhDelete: TMenuItem Caption = '&Delete' ShortCut = 46 OnClick = bDelHeaderClick end object N2: TMenuItem Caption = '-' end object mHeaderUp: TMenuItem Tag = -1 Caption = 'Move &Up' ShortCut = 16422 OnClick = bMoveHeaderUpClick end object mHeaderDown: TMenuItem Tag = 1 Caption = 'Move Do&wn' ShortCut = 16424 OnClick = bMoveHeaderUpClick end end object pmPlugins: TPopupMenu Left = 296 Top = 416 object mConfigurePlugin: TMenuItem Caption = '&Configure' Default = True ShortCut = 13 OnClick = bConfigSpamClick end object mAddPlugin: TMenuItem Caption = '&Add' ShortCut = 45 OnClick = bAddSpamClick end object mInfoPlugin: TMenuItem Caption = '&Information' ShortCut = 16397 OnClick = bInfoPlugInClick end object N3: TMenuItem Caption = '-' end object mDelPlugin: TMenuItem Caption = '&Delete' ShortCut = 46 OnClick = bDeleteSpamClick end end object pmVModes: TPopupMenu Left = 327 Top = 416 object miNew: TMenuItem Caption = 'New' ShortCut = 45 OnClick = btnAddVMClick end object miEdit: TMenuItem Caption = 'Edit' Default = True ShortCut = 13 OnClick = btnEditVMClick end object miDelete: TMenuItem Caption = 'Delete' ShortCut = 46 OnClick = btnDeleteVMClick end object miUseBy: TMenuItem Caption = 'Use by...' ShortCut = 8205 OnClick = btnUseByClick end end end